Inference at * 
Iof proof for Lemma absval zero:


  i:. (|i| = 0)  (i = 0) 

latex

 by ((((Unfold `absval` 0) 
CollapseTHEN (UnivCD))) 
CollapseTHENA ((Auto_aux (first_nat 1:n
C) ((first_nat 1:n),(first_nat 3:n)) (first_tok :t) inil_term))) 

latex

C1: 

C1: 1. i : 
C1:   (if 0 z i then i else -i fi  = 0)  (i = 0)
C.

Definitions

t  T, |i|, x:A. B(x)